home *** CD-ROM | disk | FTP | other *** search
/ Aminet 37 / Aminet 37 (2000)(Schatztruhe)[!][Jun 2000].iso / Aminet / comm / mail / AEMail230.lha / aemail230 / arexx / AEMAIL_TOFRONT.aem < prev    next >
Text File  |  1999-02-28  |  236b  |  17 lines
  1. /* AEMAIL Screen To Front */
  2.  
  3. OPTIONS RESULTS
  4.  
  5. wwwport = ADDRESS()
  6.  
  7. IF wwwport = "REXX" THEN DO
  8.     wwwport = "IBROWSE"
  9.     END
  10.  
  11. IF SHOW('P', "AEMAIL1") THEN
  12.     ADDRESS AEMAIL1 SCREENTOFRONT AEMAIL
  13.  
  14. ADDRESS VALUE wwwport
  15.  
  16. "QUIT FORCE"
  17.